﻿Public Class NCostos
    Public Function combocostostipo2(ByVal texto As String) As DataTable

        Dim oDatos As New Datos.Dcostos
        Try
            Return oDatos.llenarcombocostostipo2(texto)

        Catch ex As Exception
            Throw New ArgumentException(ex.Message)
        Finally
            oDatos = Nothing
        End Try
    End Function


End Class
